<?php
    include_once '../../../../controlador/php/conexion/Conexion10.php';
    $con = new Conexion10();

    $OID = $_REQUEST['OID'];

    $listado = "Select HCNSOLEXA.OID,ADNINGRESO.AINCONSEC AS INGRESO, HCNSOLEXA.HCSCANTI AS CANTIDAD,
                CONVERT(NVARCHAR(500),HCNSOLEXA.HCSOBSERV) AS OBSERVACIONES,HCNSOLEXA.HCSFECSOL AS FECHA_SOLICITUD,
                HCNFOLIO.HCNUMFOL AS NUM_FOLIO,GENSERIPS.SIPCODIGO AS CODIGO, GENSERIPS.SIPNOMBRE AS MUESTRA,
                GENPACIEN.PACNUMDOC AS DOCUMENTO,RTrim(GENPACIEN.PACPRINOM +' '+
                GENPACIEN.PACSEGNOM +' '+ GENPACIEN.PACPRIAPE +' '+ GENPACIEN.PACSEGAPE) AS NOM_PACIENTE,
                HPNDEFCAM.HCACODIGO AS CAMA,GENMEDICO.GMENOMCOM AS MEDICO,Case
                When HCNSOLEXA.HCSESTADO = '0' Then 'URGENTE' Else 'RUTINARIO'
              End ESTADO, GENPACIEN.GPAFECNAC,Case
                When ADNINGRESO.AINTIPING = '1' Then 'AMBULATORIO' Else 'HOSPITALARIO'
              End CLASE_INGRESO,Case When ADNINGRESO.AINURGCON = '0' Then 'URGENCIAS'
                When ADNINGRESO.AINURGCON = '1' Then 'CONSULTA_EXTERNA'
                When ADNINGRESO.AINURGCON = '2' Then 'NACIDO_HOSPITAL'
                When ADNINGRESO.AINURGCON = '3' Then 'REMITIDO'
                When ADNINGRESO.AINURGCON = '4' Then 'HOSPI_URGENCIAS'
                When ADNINGRESO.AINURGCON = '5' Then 'HOSPITALIZACIÓN'
                When ADNINGRESO.AINURGCON = '6' Then 'IMAGENES'
                When ADNINGRESO.AINURGCON = '7' Then 'LABORATORIO'
              End INGRESO_POR,Case SLNORDSER.SOSESTADO When 0 Then 'REGISTRADO'
               When 1 Then 'CONFIRMADO' When 2 Then 'ANULADO'
              End As ESTADOORDEN,CONVERT(NVARCHAR(100),SLNORDSER.SOSDESORD) AS ORDEN_SERVICIO,
              SLNORDSER.SOSORDSER,lbseguimiento.segfectom as 'fechatoma', lbseguimiento.segestado,usuR.usu_oid,RTRIM(usuR.usu_nombres +''+usuR.usu_apellidos)AS NOMBRESR,
              usuT.usu_oid,RTRIM(usuT.usu_nombres +''+usuT.usu_apellidos)AS NOMBREST,usuF.usu_oid,RTRIM(usuF.usu_nombres +''+usuF.usu_apellidos)AS NOMBRESF
              From GENPACIEN Inner Join
                ADNINGRESO On GENPACIEN.OID = ADNINGRESO.GENPACIEN Inner Join
                HCNFOLIO On ADNINGRESO.OID = HCNFOLIO.ADNINGRESO Inner Join
                GENMEDICO On HCNFOLIO.GENMEDICO = GENMEDICO.OID Inner Join
                HCNSOLEXA On HCNSOLEXA.HCNFOLIO = HCNFOLIO.OID Inner Join
                GENSERIPS On HCNSOLEXA.GENSERIPS = GENSERIPS.OID Inner Join
                SLNSERHOJ On HCNSOLEXA.SLNSERHOJ = SLNSERHOJ.OID Inner Join
                SLNSERPRO On SLNSERHOJ.OID = SLNSERPRO.OID Inner Join
                SLNORDSER On SLNSERPRO.SLNORDSER1 = SLNORDSER.OID And SLNSERPRO.ADNINGRES1 =
                SLNORDSER.ADNINGRES1 Left Outer Join
                HPNESTANC On ADNINGRESO.OID = HPNESTANC.ADNINGRES Left Outer Join
                HPNDEFCAM On HPNESTANC.HPNDEFCAM = HPNDEFCAM.OID
                left join planillaUsuario..lbseguimiento on HCNSOLEXA.OID  = planillaUsuario..lbseguimiento.hcnsolexa
                left join planillaUsuario ..usuario as usuR on usuR.usu_oid = planillaUsuario..lbseguimiento.usu_oidr
                left join planillaUsuario ..usuario as usuT on usuT.usu_oid = planillaUsuario..lbseguimiento.usu_oid
                left join planillaUsuario ..usuario as usuF on usuF.usu_oid = planillaUsuario..lbseguimiento.usu_oidf
              Where 
                GENSERIPS.GENARESER1 = '15' And HPNESTANC.HESFECSAL Is Null and HCNSOLEXA.OID= '".$OID."'
              Order By HCNSOLEXA.HCSFECSOL DESC";
    $res = $con->query($listado);

    while($re = mssql_fetch_array($res)){
        $lista[] = array_map(utf8_encode,$re);
    }
    echo json_encode($lista);
    
    $con->cerrarConexion(); 
    
?>
